home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 34.zip / BS1 part 34 / Pro-net (final).adf / initdatadisk < prev    next >
Text File  |  2018-01-18  |  453b  |  33 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6. . Usage INITDATADISK  drive_name
  7. .key NAME
  8. if <NAME$"NOTHING"> EQ "NOTHING"
  9. ECHO " "
  10. ECHO "Usage:"
  11. ECHO " "
  12. ECHO "EXECUTE PRO-NET:INITDATADISK  drive_name"
  13. ECHO " "
  14. QUIT
  15. endif
  16. COPY PRO-NET:init  ram:
  17. COPY PRO-NET:DirEmpty  ram:
  18. CD RAM:
  19. ECHO "Please insert your data disk in <NAME>"
  20. ASK "Are you ready (Y/N)?"
  21. if warn
  22. EXECUTE ram:init <NAME>
  23. QUIT
  24. endif
  25. ECHO " "
  26. ECHO "Usage:"
  27. ECHO " "
  28. ECHO "EXECUTE PRO-NET:INITDATADISK  drive_name"
  29. ECHO " "
  30. QUIT
  31.  
  32.  
  33.